home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gigarom 1
/
Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso
/
FILES
/
HYP
/
A-B
/
Baseball Card Keeper Demo.cpt
/
Baseball Card Keeper Demo
/
card_7337.txt
< prev
next >
Wrap
Text File
|
1991-08-01
|
5KB
|
251 lines
-- card: 7337 from stack: in
-- bmap block id: 7550
-- flags: 0000
-- background id: 6634
-- name:
-- part 1 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=363 top=37 right=61 bottom=462
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 2 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=346 top=64 right=88 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 3 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=80 top=37 right=61 bottom=240
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 4 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=76 top=65 right=92 bottom=243
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 5 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=103 top=124 right=148 bottom=164
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 6 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=79 top=153 right=177 bottom=140
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 7 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=153 top=178 right=202 bottom=214
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 8 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=218 top=202 right=226 bottom=279
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 9 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=147 top=230 right=253 bottom=225
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 10 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=135 top=258 right=282 bottom=241
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 11 (field)
-- low flags: 04
-- high flags: 0007
-- rect: left=331 top=121 right=272 bottom=471
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 12 (field)
-- low flags: 00
-- high flags: 4000
-- rect: left=82 top=96 right=120 bottom=143
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 168
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 14 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=332 top=291 right=313 bottom=432
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find Player
----- HyperTalk script -----
on mouseUp
global lastFind
ask "What player should I find?"
if it is empty then exit mouseUp
Find it
if the result ≠ empty then answer "Sorry, the player was not found."
end mouseUp
-- part 15 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=192 top=291 right=313 bottom=297
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Quit HyperCard
----- HyperTalk script -----
on mouseUp
doMenu "Quit HyperCard"
end mouseUp
-- part 16 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=49 top=290 right=312 bottom=159
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Print Card
----- HyperTalk script -----
on mouseUp
doMenu "Print Card"
end mouseUp
-- part 17 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=211 top=140 right=162 bottom=313
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Print Reg. Card
----- HyperTalk script -----
on mouseUp
go to card "Registration Card"
doMenu "Print Card"
end mouseUp